Pascal Super Library/Pascal Super Library (CW International)(1997).bin/LIBRARY/CMPLTPAS/DEFS.DEF

Text File | 1988-12-15 | 805b | 28 lines

  TimeRec = RECORD
              TimeComp   : Word;       { DOS time stamp format }
              TimeString : String80;
              PM         : Boolean;
              Hours,Minutes,Seconds,Hundredths : Integer
            END;

  DateRec = RECORD
              DateComp       : Word;
              LongDateString : String80;
              DateString     : String80;
              Year,Month,Day : Integer;
              DayOfWeek      : Integer
            END;

  DIRPtr = ^DIRRec;
  DIRRec = RECORD
             FileName  : String15;
             Attrib    : Byte;
             FileSize  : Real;
             TimeStamp : TimeRec;
             DateStamp : DateRec;
             Prior     : DIRPtr;
             Next      : DIRPtr;
           END;

  DTAPtr  = ^SearchRec;